(end-of-buffer): Recenter overlay lists.

diff --git a/lisp/simple.el b/lisp/simple.el
index 484b217c5fa81f0dfa3bece0b6e8bfc2b12592e4..6dbfccad589628ada9753c3a5c6d4a0d9bff3468 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -289,7 +289,9 @@ Don't use this command in Lisp programs!
                    (goto-char (window-start))
                    (vertical-motion (window-height))
                    (< (point) old-point)))
-       (recenter -3))))
+       (progn
+         (overlay-recenter (point))
+         (recenter -3)))))
 
 (defun mark-whole-buffer ()
   "Put point at beginning and mark at end of buffer.